/ BBS in a Box 15 / BBS in a box XV-2.iso / Files II / Publish / A / Alpha 5.96.sit / Tcl / SystemCode / browser.tcl

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0b 62 72 6f 77 73 65 | 72 2e 74 63 6c 00 00 00 |..browse|r.tcl...|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 41 4c 46 | 41 01 00 00 00 00 00 00 |.TEXTALF|A.......|
|00000050| 00 00 00 00 00 02 ac 00 | 00 02 0c aa 43 0c 13 aa |........|....C...|
|00000060| 43 0c 13 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |C.......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 e9 07 00 00 |........|........|
|00000080| 23 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |#=======|========|
|00000090| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000a0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000b0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 0d 23 |========|======.#|
|000000d0| 20 42 72 6f 77 73 65 72 | 20 6d 6f 64 65 2e 0d 23 | Browser| mode..#|
|000000e0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000f0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000100| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000110| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000120| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 0d 70 72 |========|=====.pr|
|00000130| 6f 63 20 64 75 6d 6d 79 | 42 72 77 73 20 7b 7d 20 |oc dummy|Brws {} |
|00000140| 7b 7d 0d 0d 70 72 6f 63 | 20 75 70 42 72 6f 77 73 |{}..proc| upBrows|
|00000150| 65 20 7b 7d 20 7b 0d 09 | 73 65 74 20 6c 69 6d 69 |e {} {..|set limi|
|00000160| 74 20 5b 6e 65 78 74 4c | 69 6e 65 53 74 61 72 74 |t [nextL|ineStart|
|00000170| 20 5b 6e 65 78 74 4c 69 | 6e 65 53 74 61 72 74 20 | [nextLi|neStart |
|00000180| 30 5d 5d 0d 09 69 66 20 | 7b 5b 67 65 74 50 6f 73 |0]]..if |{[getPos|
|00000190| 5d 20 3e 20 24 6c 69 6d | 69 74 7d 20 7b 0d 09 09 |] > $lim|it} {...|
|000001a0| 73 65 74 20 6c 69 6d 69 | 74 20 5b 65 78 70 72 20 |set limi|t [expr |
|000001b0| 5b 67 65 74 50 6f 73 5d | 20 2d 20 31 5d 0d 09 7d |[getPos]| - 1]..}|
|000001c0| 0d 09 73 65 6c 65 63 74 | 20 5b 6c 69 6e 65 53 74 |..select| [lineSt|
|000001d0| 61 72 74 20 24 6c 69 6d | 69 74 5d 20 5b 6e 65 78 |art $lim|it] [nex|
|000001e0| 74 4c 69 6e 65 53 74 61 | 72 74 20 24 6c 69 6d 69 |tLineSta|rt $limi|
|000001f0| 74 5d 0d 7d 0d 0d 70 72 | 6f 63 20 64 6f 77 6e 42 |t].}..pr|oc downB|
|00000200| 72 6f 77 73 65 20 7b 7d | 20 7b 0d 09 69 66 20 7b |rowse {}| {..if {|
|00000210| 5b 6e 65 78 74 4c 69 6e | 65 53 74 61 72 74 20 5b |[nextLin|eStart [|
|00000220| 67 65 74 50 6f 73 5d 5d | 20 21 3d 20 5b 6d 61 78 |getPos]]| != [max|
|00000230| 50 6f 73 5d 7d 20 7b 0d | 09 09 73 65 6c 65 63 74 |Pos]} {.|..select|
|00000240| 20 5b 6e 65 78 74 4c 69 | 6e 65 53 74 61 72 74 20 | [nextLi|neStart |
|00000250| 5b 67 65 74 50 6f 73 5d | 5d 20 5b 6e 65 78 74 4c |[getPos]|] [nextL|
|00000260| 69 6e 65 53 74 61 72 74 | 20 5b 6e 65 78 74 4c 69 |ineStart| [nextLi|
|00000270| 6e 65 53 74 61 72 74 20 | 5b 67 65 74 50 6f 73 5d |neStart |[getPos]|
|00000280| 5d 5d 0d 09 7d 0d 7d 0d | 0d 62 69 6e 64 20 27 5c |]]..}.}.|.bind '\|
|00000290| 72 27 09 09 67 6f 74 6f | 4d 61 74 63 68 09 42 72 |r'..goto|Match.Br|
|000002a0| 77 73 0d 62 69 6e 64 20 | 65 6e 74 65 72 09 09 67 |ws.bind |enter..g|
|000002b0| 6f 74 6f 4d 61 74 63 68 | 09 42 72 77 73 0d 62 69 |otoMatch|.Brws.bi|
|000002c0| 6e 64 20 64 6f 77 6e 20 | 09 09 64 6f 77 6e 42 72 |nd down |..downBr|
|000002d0| 6f 77 73 65 20 42 72 77 | 73 0d 62 69 6e 64 20 75 |owse Brw|s.bind u|
|000002e0| 70 20 09 09 75 70 42 72 | 6f 77 73 65 20 42 72 77 |p ..upBr|owse Brw|
|000002f0| 73 0d 62 69 6e 64 20 27 | 6e 27 20 3c 7a 3e 09 64 |s.bind '|n' <z>.d|
|00000300| 6f 77 6e 42 72 6f 77 73 | 65 20 42 72 77 73 0d 62 |ownBrows|e Brws.b|
|00000310| 69 6e 64 20 27 70 27 20 | 3c 7a 3e 09 75 70 42 72 |ind 'p' |<z>.upBr|
|00000320| 6f 77 73 65 20 42 72 77 | 73 0d 0d 0d 00 00 00 00 |owse Brw|s.......|
|00000330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000340| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000350| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000360| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000370| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000380| 00 00 01 00 00 00 01 ca | 00 00 00 ca 00 00 00 42 |........|.......B|
|00000390| 01 32 80 00 00 00 00 00 | 00 4a 01 3d 00 7d 02 0b |.2......|.J.=.}..|
|000003a0| 80 00 00 00 00 00 00 8a | 01 3d 00 cf 02 0b 80 00 |........|.=......|
|000003b0| 0b 62 72 6f 77 73 65 72 | 2e 74 63 6c 02 00 02 00 |.browser|.tcl....|
|000003c0| 54 45 58 54 41 4c 46 41 | 01 00 00 00 00 40 00 00 |TEXTALFA|.....@..|
|000003d0| 02 00 54 45 58 54 41 4c | 46 41 01 00 00 00 00 40 |..TEXTAL|FA.....@|
|000003e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003f0| 00 00 a9 a2 5c 51 00 00 | 02 ac 00 00 02 0c 73 00 |....\Q..|......s.|
|00000400| 00 00 00 00 00 0b 00 c6 | 00 39 01 a9 c0 02 00 80 |........|.9......|
|00000410| 00 00 00 00 00 a6 01 5b | 00 b3 01 fc c0 02 00 81 |.......[|........|
|00000420| 00 00 00 00 00 96 01 5b | 00 9f 01 f3 c0 02 00 82 |.......[|........|
|00000430| 00 00 00 00 00 ba 01 5b | 00 c6 01 ff c0 02 00 83 |.......[|........|
|00000440| 00 00 00 10 00 00 00 00 | 00 00 00 00 00 00 ff ff |........|........|
|00000450| ff ff cc cc 00 00 00 30 | 00 00 00 00 00 00 00 04 |.......0|........|
|00000460| 00 00 dd dd dd dd dd dd | 00 01 00 00 00 00 00 00 |........|........|
|00000470| 00 02 00 00 00 00 00 00 | 00 03 00 00 00 00 00 00 |........|........|
|00000480| 00 00 00 7a 00 06 00 00 | 01 76 00 00 01 76 0b 64 |...z....|.v...v.d|
|00000490| 6f 77 6e 42 72 6f 77 73 | 65 00 00 00 02 09 00 00 |ownBrows|e.......|
|000004a0| 02 09 09 67 6f 74 6f 45 | 72 72 6f 72 00 00 02 aa |...gotoE|rror....|
|000004b0| 00 00 02 aa 09 6e 65 78 | 74 45 72 72 6f 72 00 00 |.....nex|tError..|
|000004c0| 02 aa 00 00 02 aa 0d 70 | 72 65 76 69 6f 75 73 45 |.......p|reviousE|
|000004d0| 72 72 6f 72 00 00 02 aa | 00 00 02 aa 0f 73 65 74 |rror....|.....set|
|000004e0| 42 72 6f 77 73 65 72 4d | 6f 64 65 00 00 00 00 ae |BrowserM|ode.....|
|000004f0| 00 00 00 ae 09 75 70 42 | 72 6f 77 73 65 00 00 00 |.....upB|rowse...|
|00000500| 00 48 00 09 4d 6f 6e 61 | 63 6f 00 00 00 dd c7 d8 |.H..Mona|co......|
|00000510| 00 00 00 00 00 f4 cc a2 | 00 03 22 52 03 0d 00 f1 |........|.."R....|
|00000520| 14 0e 00 00 00 04 00 04 | 00 28 00 03 01 ca 02 79 |........|.(.....y|
|00000530| 00 28 00 03 01 ca 02 79 | aa a2 8d 31 00 00 02 09 |.(.....y|...1....|
|00000540| 00 00 02 09 00 00 00 00 | 01 00 00 00 01 00 00 00 |........|........|
|00000550| 01 ca 00 00 00 ca 00 00 | 00 42 00 dd c7 d8 0e b2 |........|.B......|
|00000560| 00 00 00 1c 00 3e 00 00 | 4d 50 53 52 00 01 00 0a |.....>..|MPSR....|
|00000570| 03 ef 00 00 00 00 00 00 | 00 00 00 00 03 ed ff ff |........|........|
|00000580| 00 00 00 7e 00 e1 97 64 | 03 74 61 62 00 00 00 00 |...~...d|.tab....|
|00000590| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+